home *** CD-ROM | disk | FTP | other *** search
MacBinary | 2002-01-04 | 12.0 KB | [TgPj/RBv2] |
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
Confidence | Program | Detection | Match Type | Support
|
---|
66%
| dexvert
| Rocket eBook (document/rocketeBook)
| ext
| Supported |
1%
| dexvert
| MacBinary (archive/macBinary)
| fallback
| Supported |
100%
| file
| MacBinary II, inited, Fri Jan 4 13:14:25 2002, modified Fri Jan 4 13:14:25 2002, creator 'RBv2', type 'TgPj', 11738 bytes "FileMgr Demo.rb" , at 0x2e5a 286 bytes resource
| default (weak)
| |
99%
| file
| data
| default
| |
100%
| TrID
| MacBinary 2
| default (weak)
| |
100%
| dearkID
| deark: macbinary
| default
| |
100%
| lsar
| MacBinary
| default
|
|
id metadata |
---|
key | value |
---|
macFileType | [TgPj] |
macFileCreator | [RBv2] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 46 69 6c 65 4d 67 | 72 20 44 65 6d 6f 2e 72 |..FileMg|r Demo.r|
|00000010| 62 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |b.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 67 50 6a 52 42 76 | 32 01 00 00 11 00 01 00 |.TgPjRBv|2.......|
|00000050| 00 00 00 00 00 2d da 00 | 00 01 1e b8 5b a1 81 b8 |.....-..|....[...|
|00000060| 5b a1 81 00 00 10 00 00 | 00 00 00 00 00 00 00 00 |[.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 4e 32 00 00 |........|....N2..|
|00000080| 0d 00 00 00 41 41 41 41 | 41 41 41 41 41 41 41 41 |....AAAA|AAAAAAAA|
|00000090| 41 41 41 41 01 04 3f 3f | 3f 3f 00 00 01 00 01 00 |AAAA..??|??......|
|000000a0| 0c 46 69 6c 65 4d 67 72 | 2d 44 65 6d 6f 80 80 80 |.FileMgr|-Demo...|
|000000b0| 01 80 80 80 01 01 00 00 | 03 00 04 76 31 2e 30 1a |........|...v1.0.|
|000000c0| 76 31 2e 30 2c 20 62 79 | 20 54 68 6f 6d 61 73 20 |v1.0, by| Thomas |
|000000d0| 54 65 6d 70 65 6c 6d 61 | 6e 6e 00 01 00 0b 41 70 |Tempelma|nn....Ap|
|000000e0| 70 4e 61 6d 65 2e 65 78 | 65 00 0e 4d 79 20 41 70 |pName.ex|e..My Ap|
|000000f0| 70 6c 69 63 61 74 69 6f | 6e 88 03 32 90 06 b0 03 |plicatio|n..2....|
|00000100| 06 69 63 73 23 80 01 01 | 80 06 60 08 10 08 90 08 |.ics#...|..`.....|
|00000110| 10 0c b0 33 4c 20 84 22 | 14 60 86 a2 17 99 9f 66 |...3L ."|.`.....f|
|00000120| 7e 18 78 06 e0 01 80 01 | 80 07 e0 0f f0 0f f0 0f |~.x.....|........|
|00000130| f0 0f f0 3f fc 3f fc 3f | fc 7f fe ff ff ff ff 7f |...?.?.?|........|
|00000140| fe 1f f8 07 e0 01 80 49 | 43 4e 23 80 04 00 01 80 |.......I|CN#.....|
|00000150| 00 00 06 60 00 00 18 18 | 00 00 60 06 00 00 48 0a |...`....|..`...H.|
|00000160| 00 00 42 22 00 00 40 8a | 00 00 40 22 00 00 40 8a |..B"..@.|..@"..@.|
|00000170| 00 00 40 22 00 00 40 8a | 00 00 60 26 00 01 98 99 |..@"..@.|..`&....|
|00000180| 80 06 06 60 60 18 01 80 | 18 12 02 20 28 10 88 88 |...``...|... (...|
|00000190| 88 10 22 02 28 30 08 80 | 8c 70 22 02 2a 90 08 80 |..".(0..|.p".*...|
|000001a0| 8d b0 22 02 2b 98 09 80 | 99 a6 26 62 67 69 98 19 |..".+...|..&bgi..|
|000001b0| 9e 1a 60 06 78 06 80 01 | e0 01 a0 07 80 00 68 1e |..`.x...|......h.|
|000001c0| 00 00 1a 78 00 00 06 e0 | 00 00 01 80 00 00 01 80 |...x....|........|
|000001d0| 00 00 07 e0 00 00 1f f8 | 00 00 7f fe 00 00 7f fe |........|........|
|000001e0| 00 00 7f fe 00 00 7f fe | 00 00 7f fe 00 00 7f fe |........|........|
|000001f0| 00 00 7f fe 00 00 7f fe | 00 00 7f fe 00 01 ff ff |........|........|
|00000200| 80 07 ff ff e0 1f ff ff | f8 1f ff ff f8 1f ff ff |........|........|
|00000210| f8 1f ff ff f8 3f ff ff | fc 7f ff ff fe ff ff ff |.....?..|........|
|00000220| ff ff ff ff ff ff ff ff | ff ff ff ff ff 7f ff ff |........|........|
|00000230| fe 1f ff ff f8 07 ff ff | e0 01 ff ff 80 00 7f fe |........|........|
|00000240| 00 00 1f f8 00 00 07 e0 | 00 00 01 80 00 69 63 73 |........|.....ics|
|00000250| 34 80 02 00 00 00 0f f0 | 00 00 00 00 00 0f f8 8f |4.......|........|
|00000260| f0 00 00 00 00 f8 88 88 | 9f 00 00 00 00 f8 88 99 |........|........|
|00000270| 9f 00 00 00 00 f8 88 99 | 9f 00 00 00 00 f8 88 99 |........|........|
|00000280| 9f 00 00 00 ff cc 88 99 | 11 ff 00 00 fc cc cc 11 |........|........|
|00000290| 11 1f 00 00 fc c3 73 21 | 22 2f 00 0f fc c7 37 12 |......s!|"/....7.|
|000002a0| 12 2f f0 fc fc c3 73 21 | 22 2f df f0 cf f7 3f f2 |./....s!|"/....?.|
|000002b0| 1f fd df 0f f0 cf fc cf | fd df f0 00 0f f0 cc cd |........|........|
|000002c0| df f0 00 00 00 0f f0 df | f0 00 00 00 00 00 0f f0 |........|........|
|000002d0| 00 00 00 69 63 73 38 80 | 04 00 00 00 00 00 00 00 |...ics8.|........|
|000002e0| ff ff 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|000002f0| e1 e1 ff ff 00 00 00 00 | 00 00 00 00 00 ff e3 e1 |........|........|
|00000300| e1 e1 e1 e5 ff 00 00 00 | 00 00 00 00 00 ff e3 e3 |........|........|
|00000310| e3 e5 e5 e5 ff 00 00 00 | 00 00 00 00 00 ff e3 e3 |........|........|
|00000320| e3 e5 e5 e5 ff 00 00 00 | 00 00 00 00 00 ff e3 e3 |........|........|
|00000330| e3 e5 e5 e5 ff 00 00 00 | 00 00 00 ff ff 2a 2a e3 |........|.....**.|
|00000340| e3 e5 e5 0b 0b ff ff 00 | 00 00 00 ff 2a 2a 2a 2a |........|....****|
|00000350| 2a 0b 0b 0b 0b 0b ff 00 | 00 00 00 ff 54 54 7f 7f |*.......|....TT..|
|00000360| 7f 11 11 11 17 17 ff 00 | 00 00 ff ff 54 54 7f 7f |........|....TT..|
|00000370| 7f 11 11 11 17 17 ff ff | 00 ff f6 ff 54 54 7f 7f |........|....TT..|
|00000380| 7f 11 11 11 17 17 ff f9 | ff ff f6 f6 ff ff 7f 7f |........|........|
|00000390| ff ff 11 11 ff ff f9 f9 | ff 00 ff ff f6 f6 ff ff |........|........|
|000003a0| f7 f7 ff ff f9 f9 ff ff | 00 00 00 00 ff ff f6 f6 |........|........|
|000003b0| f7 f7 f9 f9 ff ff 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|000003c0| f6 f9 ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| ff ff 00 00 00 00 00 00 | 00 69 63 6c 34 80 08 00 |........|.icl4...|
|000003e0| 00 00 00 00 00 00 0f f0 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 0f f8 8f | f0 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 00 0f f8 88 88 | 8f f0 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 0f f8 88 88 88 | 88 8f f0 00 00 00 00 00 |........|........|
|00000420| 00 00 00 0f 88 08 88 88 | 88 89 f0 00 00 00 00 00 |........|........|
|00000430| 00 00 00 0f 88 88 08 88 | 89 99 f0 00 00 00 00 00 |........|........|
|00000440| 00 00 00 0f 88 88 88 09 | 99 99 f0 00 00 00 00 00 |........|........|
|00000450| 00 00 00 0f 88 88 88 99 | 99 99 f0 00 00 00 00 00 |........|........|
|00000460| 00 00 00 0f 88 88 88 89 | 99 99 f0 00 00 00 00 00 |........|........|
|00000470| 00 00 00 0f 88 88 88 99 | 99 99 f0 00 00 00 00 00 |........|........|
|00000480| 00 00 00 0f 88 88 88 89 | 99 99 f0 00 00 00 00 00 |........|........|
|00000490| 00 00 00 0f 88 88 88 99 | 99 99 f0 00 00 00 00 00 |........|........|
|000004a0| 00 00 0f fc c8 88 88 89 | 99 91 1f f0 00 00 00 00 |........|........|
|000004b0| 00 0f fc cc cc c8 88 99 | 91 11 11 1f f0 00 00 00 |........|........|
|000004c0| 0f fc cc cc cc cc cc 71 | 11 11 11 11 1f f0 00 00 |.......q|........|
|000004d0| 0f cc 0c cc cc cc 37 22 | 01 11 11 11 12 f0 00 00 |......7"|........|
|000004e0| 0f cc cc 0c cc 73 73 71 | 21 01 11 12 22 f0 00 00 |.....ssq|!..."...|
|000004f0| 0f cc cc cc 07 37 37 22 | 12 12 02 22 22 f0 00 00 |.....77"|...""...|
|00000500| ff cc cc cc 73 73 73 71 | 21 21 22 22 22 ff 00 0f |....sssq|!!"""...|
|00000510| 0f cc cc cc c7 37 37 22 | 12 12 12 22 22 fd f0 f0 |.....77"|...""...|
|00000520| cf cc cc cc 73 73 73 71 | 21 21 22 22 22 fc df fc |....sssq|!!"""...|
|00000530| cf cc cc cc c7 37 37 22 | 12 12 12 22 22 fc cf fc |.....77"|...""...|
|00000540| 0f fc cc cc 73 73 7f f1 | 21 21 22 22 2f fc df fc |....ss..|!!""/...|
|00000550| cc 0f fc cc c7 3f fd df | f2 12 12 2f fc dd df 0f |.....?..|.../....|
|00000560| fc cc 0f fc 7f fd dd dc | cf f1 2f fc dd df f0 00 |........|../.....|
|00000570| 0f fc cc 0f fd dd cc cc | cc cf fc dd df f0 00 00 |........|........|
|00000580| 00 0f fc cc 00 cc cc cc | cc cc dd df f0 00 00 00 |........|........|
|00000590| 00 00 0f fc cc 00 cc cc | cc dd df f0 00 00 00 00 |........|........|
|000005a0| 00 00 00 0f fc cc 00 cc | dd df f0 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 0f fc cc dd | df f0 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 0f fc df | f0 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 0f f0 | 00 00 00 00 00 00 00 69 |........|.......i|
|000005e0| 63 6c 38 80 10 00 00 00 | 00 00 00 00 00 00 00 00 |cl8.....|........|
|000005f0| 00 00 00 00 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 ff ff e1 e1 ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| ff ff e1 e1 e1 e1 e1 e1 | ff ff 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00000650| e1 e1 e1 e1 e1 e1 e1 e1 | e1 e1 ff ff 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|00000670| e3 00 e1 e1 e1 e1 e1 e1 | e1 e3 e5 ff 00 00 00 00 |........|........|
|00000680| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|00000690| e3 e3 e3 00 e1 e1 e1 e3 | e5 e5 e5 ff 00 00 00 00 |........|........|
|000006a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|000006b0| e3 e3 e3 e3 e3 00 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|000006c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|000006d0| e3 e3 e3 e3 e3 e5 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|000006f0| e3 e3 e3 e3 e3 e3 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|00000700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|00000710| e3 e3 e3 e3 e3 e5 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|00000730| e3 e3 e3 e3 e3 e3 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff e3 |........|........|
|00000750| e3 e3 e3 e3 e3 e5 e5 e5 | e5 e5 e5 ff 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff 2a 2a |........|......**|
|00000770| e3 e3 e3 e3 e3 e3 e5 e5 | e5 e5 0b 0b ff ff 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 ff ff 2a 2a 2a 2a |........|....****|
|00000790| 2a 2a e3 e3 e3 e5 e5 e5 | 0b 0b 0b 0b 0b 0b ff ff |**......|........|
|000007a0| 00 00 00 00 00 00 00 00 | ff ff 2a 2a 2a 2a 2a 2a |........|..******|
|000007b0| 2a 2a 2a 2a 2a 54 0b 0b | 0b 0b 0b 0b 0b 0b 0b 0b |*****T..|........|
|000007c0| ff ff 00 00 00 00 00 00 | ff 54 54 00 2a 2a 2a 2a |........|.TT.****|
|000007d0| 2a 2a 2a 54 7f 11 11 00 | 0b 0b 0b 0b 0b 0b 0b 11 |***T....|........|
|000007e0| 17 ff 00 00 00 00 00 00 | ff 54 54 54 54 00 2a 2a |........|.TTTT.**|
|000007f0| 2a 54 7f 7f 7f 7f 11 11 | 11 00 0b 0b 0b 11 17 17 |*T......|........|
|00000800| 17 ff 00 00 00 00 00 00 | ff 54 54 54 54 54 54 00 |........|.TTTTTT.|
|00000810| 7f 7f 7f 7f 7f 11 11 11 | 11 11 11 00 17 17 17 17 |........|........|
|00000820| 17 ff 00 00 00 00 00 ff | ff 54 54 54 54 54 54 7f |........|.TTTTTT.|
|00000830| 7f 7f 7f 7f 7f 7f 11 11 | 11 11 11 17 17 17 17 17 |........|........|
|00000840| 17 ff ff 00 00 00 ff 00 | ff 54 54 54 54 54 54 54 |........|.TTTTTTT|
|00000850| 7f 7f 7f 7f 7f 11 11 11 | 11 11 11 11 17 17 17 17 |........|........|
|00000860| 17 ff f9 ff 00 ff 00 f7 | ff 54 54 54 54 54 54 7f |........|.TTTTTT.|
|00000870| 7f 7f 7f 7f 7f 7f 11 11 | 11 11 11 17 17 17 17 17 |........|........|
|00000880| 17 ff f7 f9 ff ff f7 f7 | ff 54 54 54 54 54 54 54 |........|.TTTTTTT|
|00000890| 7f 7f 7f 7f 7f 11 11 11 | 11 11 11 11 17 17 17 17 |........|........|
|000008a0| 17 ff f7 f7 ff ff f7 00 | ff ff 54 54 54 54 54 7f |........|..TTTTT.|
|000008b0| 7f 7f 7f 7f ff ff 11 11 | 11 11 11 17 17 17 17 17 |........|........|
|000008c0| ff ff f7 f9 ff ff f7 f7 | f7 00 ff ff 54 54 54 54 |........|....TTTT|
|000008d0| 7f 7f ff ff f9 f9 ff ff | 11 11 11 11 17 17 ff ff |........|........|
|000008e0| f7 f9 f9 f9 ff 00 ff ff | f7 f7 f7 00 ff ff 54 7f |........|......T.|
|000008f0| ff ff f9 f9 f9 f9 f7 f6 | ff ff 11 17 ff ff f7 f9 |........|........|
|00000900| f9 f9 ff ff 00 00 00 00 | ff ff f7 f7 f7 00 ff ff |........|........|
|00000910| f9 f9 f9 f7 f6 f6 f6 f6 | f6 f6 ff ff f7 f9 f9 f9 |........|........|
|00000920| ff ff 00 00 00 00 00 00 | 00 00 ff ff f7 f7 f7 00 |........|........|
|00000930| 00 f6 f6 f6 f6 f6 f6 f6 | f6 f7 f7 f9 f9 f9 ff ff |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff f7 f7 |........|........|
|00000950| f7 00 00 f6 f6 f6 f6 f7 | f7 f9 f9 f9 ff ff 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00000970| f7 f7 f7 00 00 f7 f7 f9 | f9 f9 ff ff 00 00 00 00 |........|........|
|00000980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000990| ff ff f7 f7 f7 f9 f9 f9 | ff ff 00 00 00 00 00 00 |........|........|
|000009a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009b0| 00 00 ff ff f7 f9 ff ff | 00 00 00 00 00 00 00 00 |........|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 01 07 41 | 6e 79 46 69 6c 65 04 3f |.......A|nyFile.?|
|000009f0| 3f 3f 3f 04 3f 3f 3f 3f | 00 00 01 41 04 56 69 65 |???.????|...A.Vie|
|00000a00| 77 0a 6d 61 69 6e 57 69 | 6e 64 6f 77 05 ac 01 91 |w.mainWi|ndow....|
|00000a10| 01 a4 01 90 01 9c 0e a6 | 09 e8 0f 15 04 4e 61 6d |........|.....Nam|
|00000a20| 65 0a 6d 61 69 6e 57 69 | 6e 64 6f 77 05 46 72 61 |e.mainWi|ndow.Fra|
|00000a30| 6d 65 01 30 0c 48 61 73 | 42 61 63 6b 43 6f 6c 6f |me.0.Has|BackColo|
|00000a40| 72 05 46 61 6c 73 65 09 | 42 61 63 6b 43 6f 6c 6f |r.False.|BackColo|
|00000a50| 72 08 31 36 37 37 37 32 | 31 35 08 42 61 63 6b 64 |r.167772|15.Backd|
|00000a60| 72 6f 70 01 30 05 54 69 | 74 6c 65 00 07 56 69 73 |rop.0.Ti|tle..Vis|
|00000a70| 69 62 6c 65 04 54 72 75 | 65 0a 46 75 6c 6c 53 63 |ible.Tru|e.FullSc|
|00000a80| 72 65 65 6e 05 46 61 6c | 73 65 0e 4d 65 6e 75 42 |reen.Fal|se.MenuB|
|00000a90| 61 72 56 69 73 69 62 6c | 65 04 54 72 75 65 08 43 |arVisibl|e.True.C|
|00000aa0| 6c 6f 73 65 42 6f 78 05 | 46 61 6c 73 65 08 47 72 |loseBox.|False.Gr|
|00000ab0| 6f 77 49 63 6f 6e 05 46 | 61 6c 73 65 08 5a 6f 6f |owIcon.F|alse.Zoo|
|00000ac0| 6d 49 63 6f 6e 05 46 61 | 6c 73 65 0b 42 61 6c 6c |mIcon.Fa|lse.Ball|
|00000ad0| 6f 6f 6e 48 65 6c 70 00 | 09 4d 61 63 50 72 6f 63 |oonHelp.|.MacProc|
|00000ae0| 49 44 01 30 09 50 6c 61 | 63 65 6d 65 6e 74 01 32 |ID.0.Pla|cement.2|
|00000af0| 05 57 69 64 74 68 03 33 | 32 36 06 48 65 69 67 68 |.Width.3|26.Heigh|
|00000b00| 74 03 32 30 35 08 4d 69 | 6e 57 69 64 74 68 02 36 |t.205.Mi|nWidth.6|
|00000b10| 34 09 4d 69 6e 48 65 69 | 67 68 74 02 36 34 08 4d |4.MinHei|ght.64.M|
|00000b20| 61 78 57 69 64 74 68 05 | 33 32 30 30 30 09 4d 61 |axWidth.|32000.Ma|
|00000b30| 78 48 65 69 67 68 74 05 | 33 32 30 30 30 07 00 0a |xHeight.|32000...|
|00000b40| 6d 61 69 6e 57 69 6e 64 | 6f 77 b8 01 06 57 69 6e |mainWind|ow...Win|
|00000b50| 64 6f 77 00 00 02 06 44 | 65 6d 6f 49 74 0f 66 20 |dow....D|emoIt.f |
|00000b60| 61 73 20 46 6f 6c 64 65 | 72 49 74 65 6d 00 00 22 |as Folde|rItem.."|
|00000b70| 19 22 19 84 02 1b 53 75 | 62 20 44 65 6d 6f 49 74 |."....Su|b DemoIt|
|00000b80| 28 66 20 61 73 20 46 6f | 6c 64 65 72 49 74 65 6d |(f as Fo|lderItem|
|00000b90| 29 2b 44 69 6d 20 73 20 | 61 73 20 53 74 72 69 6e |)+Dim s |as Strin|
|00000ba0| 67 2c 20 72 73 72 63 4f | 70 65 6e 2c 20 66 6f 75 |g, rsrcO|pen, fou|
|00000bb0| 6e 64 20 61 73 20 42 6f | 6f 6c 65 61 6e 21 44 69 |nd as Bo|olean!Di|
|00000bc0| 6d 20 76 52 65 66 4e 75 | 6d 2c 20 69 2c 20 78 2c |m vRefNu|m, i, x,|
|00000bd0| 20 65 72 72 20 61 73 20 | 49 6e 74 65 67 65 72 19 | err as |Integer.|
|00000be0| 44 69 6d 20 76 6f 6c 2c | 20 76 32 20 61 73 20 46 |Dim vol,| v2 as F|
|00000bf0| 6f 6c 64 65 72 49 74 65 | 6d 00 3e 2f 2f 20 54 68 |olderIte|m.>// Th|
|00000c00| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 66 75 6e 63 |e follow|ing func|
|00000c10| 74 69 6f 6e 73 20 61 72 | 65 20 64 65 63 6c 61 72 |tions ar|e declar|
|00000c20| 65 64 20 69 6e 20 74 68 | 65 20 70 6c 75 67 69 6e |ed in th|e plugin|
|00000c30| 20 77 65 20 74 65 73 74 | 3a 3c 2f 2f 20 a5 20 49 | we test|:<// . I|
|00000c40| 73 4f 6e 52 65 6d 6f 74 | 65 56 6f 6c 75 6d 65 28 |sOnRemot|eVolume(|
|00000c50| 66 69 6c 65 4f 72 46 6f | 6c 64 65 72 20 61 73 20 |fileOrFo|lder as |
|00000c60| 46 6f 6c 64 65 72 49 74 | 65 6d 29 20 61 73 20 42 |FolderIt|em) as B|
|00000c70| 6f 6f 6c 65 61 6e 39 2f | 2f 20 a5 20 56 6f 6c 47 |oolean9/|/ . VolG|
|00000c80| 65 74 56 52 65 66 4e 75 | 6d 28 66 69 6c 65 4f 72 |etVRefNu|m(fileOr|
|00000c90| 46 6f 6c 64 65 72 20 61 | 73 20 46 6f 6c 64 65 72 |Folder a|s Folder|
|00000ca0| 49 74 65 6d 29 20 61 73 | 20 49 6e 74 65 67 65 72 |Item) as| Integer|
|00000cb0| 36 2f 2f 20 a5 20 56 6f | 6c 75 6d 65 42 79 56 52 |6// . Vo|lumeByVR|
|00000cc0| 65 66 4e 75 6d 28 76 52 | 65 66 4e 75 6d 20 61 73 |efNum(vR|efNum as|
|00000cd0| 20 49 6e 74 65 67 65 72 | 29 20 61 73 20 46 6f 6c | Integer|) as Fol|
|00000ce0| 64 65 72 49 74 65 6d 30 | 2f 2f 20 a5 20 47 65 74 |derItem0|// . Get|
|00000cf0| 46 69 6c 65 46 6c 61 67 | 73 28 66 69 6c 65 20 61 |FileFlag|s(file a|
|00000d00| 73 20 46 6f 6c 64 65 72 | 49 74 65 6d 29 20 61 73 |s Folder|Item) as|
|00000d10| 20 49 6e 74 65 67 65 72 | 82 01 2f 2f 20 a5 20 53 | Integer|..// . S|
|00000d20| 65 74 46 69 6c 65 46 6c | 61 67 73 28 66 69 6c 65 |etFileFl|ags(file|
|00000d30| 20 61 73 20 46 6f 6c 64 | 65 72 49 74 65 6d 2c 20 | as Fold|erItem, |
|00000d40| 66 6c 61 67 73 20 61 73 | 20 49 6e 74 65 67 65 72 |flags as| Integer|
|00000d50| 29 20 61 73 20 49 6e 74 | 65 67 65 72 34 2f 2f 20 |) as Int|eger4// |
|00000d60| a5 20 47 65 74 46 6f 6c | 64 65 72 46 6c 61 67 73 |. GetFol|derFlags|
|00000d70| 28 66 6f 6c 64 65 72 20 | 61 73 20 46 6f 6c 64 65 |(folder |as Folde|
|00000d80| 72 49 74 65 6d 29 20 61 | 73 20 49 6e 74 65 67 65 |rItem) a|s Intege|
|00000d90| 72 86 01 2f 2f 20 a5 20 | 53 65 74 46 6f 6c 64 65 |r..// . |SetFolde|
|00000da0| 72 46 6c 61 67 73 28 66 | 6f 6c 64 65 72 20 61 73 |rFlags(f|older as|
|00000db0| 20 46 6f 6c 64 65 72 49 | 74 65 6d 2c 20 66 6c 61 | FolderI|tem, fla|
|00000dc0| 67 73 20 61 73 20 49 6e | 74 65 67 65 72 29 20 61 |gs as In|teger) a|
|00000dd0| 73 20 49 6e 74 65 67 65 | 72 34 2f 2f 20 a5 20 47 |s Intege|r4// . G|
|00000de0| 65 74 46 69 6c 65 41 74 | 74 72 69 62 75 74 65 28 |etFileAt|tribute(|
|00000df0| 66 69 6c 65 20 61 73 20 | 46 6f 6c 64 65 72 49 74 |file as |FolderIt|
|00000e00| 65 6d 29 20 61 73 20 49 | 6e 74 65 67 65 72 2e 2f |em) as I|nteger./|
|00000e10| 2f 20 a5 20 49 73 46 69 | 6c 65 4f 70 65 6e 28 66 |/ . IsFi|leOpen(f|
|00000e20| 69 6c 65 20 61 73 20 46 | 6f 6c 64 65 72 49 74 65 |ile as F|olderIte|
|00000e30| 6d 29 20 61 73 20 42 6f | 6f 6c 65 61 6e 00 2e 73 |m) as Bo|olean..s|
|00000e40| 20 3d 20 22 50 61 74 68 | 3a 20 3c 22 20 2b 20 66 | = "Path|: <" + f|
|00000e50| 2e 61 62 73 6f 6c 75 74 | 65 70 61 74 68 20 2b 20 |.absolut|epath + |
|00000e60| 22 3e 22 20 2b 20 63 68 | 72 28 31 33 29 00 10 73 |">" + ch|r(13)..s|
|00000e70| 20 3d 20 73 20 2b 20 22 | 74 79 70 65 3a 20 22 1f | = s + "|type: ".|
|00000e80| 69 20 3d 20 66 2e 56 6f | 6c 47 65 74 46 6f 6c 64 |i = f.Vo|lGetFold|
|00000e90| 65 72 49 74 65 6d 49 44 | 28 66 61 6c 73 65 29 0d |erItemID|(false).|
|00000ea0| 69 66 20 69 20 3d 20 32 | 20 74 68 65 6e 33 2f 2f |if i = 2| then3//|
|00000eb0| 20 74 68 65 20 44 69 72 | 49 44 20 32 20 61 6c 77 | the Dir|ID 2 alw|
|00000ec0| 61 79 73 20 69 64 65 6e | 74 69 66 69 65 73 20 74 |ays iden|tifies t|
|00000ed0| 68 65 20 72 6f 6f 74 20 | 64 69 72 65 63 74 6f 72 |he root |director|
|00000ee0| 79 10 73 20 3d 20 73 20 | 2b 20 22 56 6f 6c 75 6d |y.s = s |+ "Volum|
|00000ef0| 65 22 17 65 6c 73 65 69 | 66 20 66 2e 64 69 72 65 |e".elsei|f f.dire|
|00000f00| 63 74 6f 72 79 20 74 68 | 65 6e 13 73 20 3d 20 73 |ctory th|en.s = s|
|00000f10| 20 2b 20 22 44 69 72 65 | 63 74 6f 72 79 22 04 65 | + "Dire|ctory".e|
|00000f20| 6c 73 65 0d 73 20 3d 20 | 73 20 2b 20 22 46 69 6c |lse.s = |s + "Fil|
|00000f30| 65 03 65 6e 64 0f 73 20 | 3d 20 73 20 2b 20 63 68 |e.end.s |= s + ch|
|00000f40| 72 28 31 33 29 00 3e 2f | 2f 20 74 68 65 20 56 52 |r(13).>/|/ the VR|
|00000f50| 65 66 4e 75 6d 20 69 64 | 65 6e 74 69 66 69 65 73 |efNum id|entifies|
|00000f60| 20 74 68 65 20 76 6f 6c | 75 6d 65 20 74 68 65 20 | the vol|ume the |
|00000f70| 69 74 65 6d 20 69 73 20 | 63 75 72 72 65 6e 74 6c |item is |currentl|
|00000f80| 79 20 6f 6e 3a 16 76 52 | 65 66 4e 75 6d 20 3d 20 |y on:.vR|efNum = |
|00000f90| 66 2e 4d 61 63 56 52 65 | 66 4e 75 6d 00 83 01 2f |f.MacVRe|fNum.../|
|00000fa0| 2f 20 6e 6f 77 20 6c 65 | 74 27 73 20 67 65 74 20 |/ now le|t's get |
|00000fb0| 74 68 65 20 76 6f 6c 75 | 6d 65 20 72 65 66 65 72 |the volu|me refer|
|00000fc0| 65 6e 63 65 20 28 72 6f | 6f 74 20 64 69 72 65 63 |ence (ro|ot direc|
|00000fd0| 74 6f 72 79 29 20 6f 66 | 20 74 68 65 20 66 69 6c |tory) of| the fil|
|00000fe0| 65 3a 22 76 6f 6c 20 3d | 20 4e 65 77 56 6f 6c 75 |e:"vol =| NewVolu|
|00000ff0| 6d 65 46 6f 6c 64 65 72 | 69 74 65 6d 28 76 52 65 |meFolder|item(vRe|
|00001000| 66 4e 75 6d 29 00 2c 73 | 20 3d 20 73 20 2b 20 22 |fNum).,s| = s + "|
|00001010| 76 52 65 66 4e 75 6d 3a | 20 22 20 2b 20 53 74 72 |vRefNum:| " + Str|
|00001020| 28 76 52 65 66 4e 75 6d | 29 20 2b 20 63 68 72 28 |(vRefNum|) + chr(|
|00001030| 31 33 29 2c 73 20 3d 20 | 73 20 2b 20 22 76 6f 6c |13),s = |s + "vol|
|00001040| 75 6d 65 20 6e 61 6d 65 | 3a 20 22 20 2b 20 76 6f |ume name|: " + vo|
|00001050| 6c 2e 6e 61 6d 65 20 2b | 20 63 68 72 28 31 33 29 |l.name +| chr(13)|
|00001060| 00 10 73 20 3d 20 73 20 | 2b 20 22 66 6c 61 67 73 |..s = s |+ "flags|
|00001070| 3a 22 13 69 66 20 66 2e | 64 69 72 65 63 74 6f 72 |:".if f.|director|
|00001080| 79 20 74 68 65 6e 14 78 | 20 3d 20 66 2e 47 65 74 |y then.x| = f.Get|
|00001090| 46 6f 6c 64 65 72 46 6c | 61 67 73 04 65 6c 73 65 |FolderFl|ags.else|
|000010a0| 12 78 20 3d 20 66 2e 47 | 65 74 46 69 6c 65 46 6c |.x = f.G|etFileFl|
|000010b0| 61 67 73 03 65 6e 64 0d | 69 66 20 78 20 3c 20 30 |ags.end.|if x < 0|
|000010c0| 20 74 68 65 6e 11 73 20 | 3d 20 73 20 2b 20 22 3c | then.s |= s + "<|
|000010d0| 45 72 72 6f 72 3e 22 04 | 65 6c 73 65 39 69 66 20 |Error>".|else9if |
|000010e0| 49 73 42 69 74 53 65 74 | 20 28 78 2c 20 31 35 29 |IsBitSet| (x, 15)|
|000010f0| 20 74 68 65 6e 20 2f 2f | 20 74 68 69 73 20 69 73 | then //| this is|
|00001100| 20 6f 6e 65 20 77 61 79 | 20 74 6f 20 74 65 73 74 | one way| to test|
|00001110| 20 61 20 62 69 74 12 73 | 20 3d 20 73 20 2b 20 22 | a bit.s| = s + "|
|00001120| 20 69 73 41 6c 69 61 73 | 22 03 65 6e 64 8a 01 69 | isAlias|".end..i|
|00001130| 66 20 42 69 74 77 69 73 | 65 41 6e 64 20 28 78 2c |f Bitwis|eAnd (x,|
|00001140| 20 26 48 34 30 30 30 29 | 20 3c 3e 20 30 20 74 68 | &H4000)| <> 0 th|
|00001150| 65 6e 20 2f 2f 20 74 68 | 69 73 20 69 73 20 74 68 |en // th|is is th|
|00001160| 65 20 6f 74 68 65 72 20 | 77 61 79 20 74 6f 20 74 |e other |way to t|
|00001170| 65 73 74 20 61 20 62 69 | 74 16 73 20 3d 20 73 20 |est a bi|t.s = s |
|00001180| 2b 20 22 20 69 73 49 6e | 76 69 73 69 62 6c 65 22 |+ " isIn|visible"|
|00001190| 03 65 6e 64 23 69 66 20 | 42 69 74 77 69 73 65 41 |.end#if |BitwiseA|
|000011a0| 6e 64 20 28 78 2c 20 26 | 48 32 30 30 30 29 20 3c |nd (x, &|H2000) <|
|000011b0| 3e 20 30 20 74 68 65 6e | 14 73 20 3d 20 73 20 2b |> 0 then|.s = s +|
|000011c0| 20 22 20 68 61 73 42 75 | 6e 64 6c 65 22 03 65 6e | " hasBu|ndle".en|
|000011d0| 64 23 69 66 20 42 69 74 | 77 69 73 65 41 6e 64 20 |d#if Bit|wiseAnd |
|000011e0| 28 78 2c 20 26 48 30 38 | 30 30 29 20 3c 3e 20 30 |(x, &H08|00) <> 0|
|000011f0| 20 74 68 65 6e 17 73 20 | 3d 20 73 20 2b 20 22 20 | then.s |= s + " |
|00001200| 69 73 53 74 61 74 69 6f | 6e 61 72 79 22 03 65 6e |isStatio|nary".en|
|00001210| 64 17 69 66 20 49 73 42 | 69 74 53 65 74 20 28 78 |d.if IsB|itSet (x|
|00001220| 2c 20 38 29 20 74 68 65 | 6e 18 73 20 3d 20 73 20 |, 8) the|n.s = s |
|00001230| 2b 20 22 20 68 61 73 42 | 65 65 6e 49 6e 69 74 65 |+ " hasB|eenInite|
|00001240| 64 22 03 65 6e 64 03 65 | 6e 64 0f 73 20 3d 20 73 |d".end.e|nd.s = s|
|00001250| 20 2b 20 63 68 72 28 31 | 33 29 00 1a 73 20 3d 20 | + chr(1|3)..s = |
|00001260| 73 20 2b 20 22 49 73 20 | 6f 70 65 6e 20 28 62 75 |s + "Is |open (bu|
|00001270| 73 79 29 3a 20 22 14 69 | 66 20 66 2e 49 73 46 69 |sy): ".i|f f.IsFi|
|00001280| 6c 65 4f 70 65 6e 20 74 | 68 65 6e 15 73 20 3d 20 |leOpen t|hen.s = |
|00001290| 73 20 2b 20 22 59 65 73 | 20 28 66 6f 72 6b 73 3a |s + "Yes| (forks:|
|000012a0| 22 30 2f 2f 20 69 66 20 | 6f 70 65 6e 2c 20 6c 65 |"0// if |open, le|
|000012b0| 74 27 73 20 61 6c 73 6f | 20 73 65 65 20 77 68 69 |t's also| see whi|
|000012c0| 63 68 20 66 6f 72 6b 73 | 20 61 72 65 20 6f 70 65 |ch forks| are ope|
|000012d0| 6e 3a 16 69 20 3d 20 66 | 2e 47 65 74 46 69 6c 65 |n:.i = f|.GetFile|
|000012e0| 41 74 74 72 69 62 75 74 | 65 1a 72 73 72 63 4f 70 |Attribut|e.rsrcOp|
|000012f0| 65 6e 20 3d 20 49 73 42 | 69 74 53 65 74 20 28 69 |en = IsB|itSet (i|
|00001300| 2c 20 32 29 28 69 66 20 | 72 73 72 63 4f 70 65 6e |, 2)(if |rsrcOpen|
|00001310| 20 3c 3e 20 66 2e 49 73 | 52 65 73 6f 75 72 63 65 | <> f.Is|Resource|
|00001320| 46 6f 72 6b 4f 70 65 6e | 20 74 68 65 6e 31 6d 73 |ForkOpen| then1ms|
|00001330| 67 42 6f 78 20 22 4f 6f | 70 73 20 2d 20 73 6f 6d |gBox "Oo|ps - som|
|00001340| 65 74 68 69 6e 67 20 69 | 73 20 6e 6f 74 20 61 73 |ething i|s not as|
|00001350| 20 69 74 20 73 68 6f 75 | 6c 64 20 62 65 21 22 03 | it shou|ld be!".|
|00001360| 65 6e 64 10 69 66 20 72 | 73 72 63 4f 70 65 6e 20 |end.if r|srcOpen |
|00001370| 74 68 65 6e 0f 73 20 3d | 20 73 20 2b 20 22 20 72 |then.s =| s + " r|
|00001380| 73 72 63 22 03 65 6e 64 | 2e 69 66 20 49 73 42 69 |src".end|.if IsBi|
|00001390| 74 53 65 74 20 28 69 2c | 20 33 29 20 74 68 65 6e |tSet (i,| 3) then|
|000013a0| 20 2f 2f 20 63 68 65 63 | 6b 20 74 68 65 20 64 61 | // chec|k the da|
|000013b0| 74 61 20 66 6f 72 6b 0f | 73 20 3d 20 73 20 2b 20 |ta fork.|s = s + |
|000013c0| 22 20 64 61 74 61 22 03 | 65 6e 64 0b 73 20 3d 20 |" data".|end.s = |
|000013d0| 73 20 2b 20 22 29 22 04 | 65 6c 73 65 0c 73 20 3d |s + ")".|else.s =|
|000013e0| 20 73 20 2b 20 22 4e 6f | 22 03 65 6e 64 0f 73 20 | s + "No|".end.s |
|000013f0| 3d 20 73 20 2b 20 63 68 | 72 28 31 33 29 00 1a 69 |= s + ch|r(13)..i|
|00001400| 66 20 66 2e 49 73 4f 6e | 52 65 6d 6f 74 65 56 6f |f f.IsOn|RemoteVo|
|00001410| 6c 75 6d 65 20 74 68 65 | 6e 13 73 20 3d 20 73 20 |lume the|n.s = s |
|00001420| 2b 20 22 49 73 20 72 65 | 6d 6f 74 65 22 04 65 6c |+ "Is re|mote".el|
|00001430| 73 65 12 73 20 3d 20 73 | 20 2b 20 22 49 73 20 6c |se.s = s| + "Is l|
|00001440| 6f 63 61 6c 22 03 65 6e | 64 00 11 49 6e 66 6f 74 |ocal".en|d..Infot|
|00001450| 65 78 74 2e 74 65 78 74 | 20 3d 20 73 00 30 2f 2f |ext.text| = s.0//|
|00001460| 20 6e 6f 77 20 77 65 20 | 63 6c 65 61 72 20 61 20 | now we |clear a |
|00001470| 66 6c 61 67 20 28 74 68 | 65 20 22 69 6e 69 74 65 |flag (th|e "inite|
|00001480| 64 22 20 66 6c 61 67 2c | 20 77 68 69 63 68 3a 2f |d" flag,| which:/|
|00001490| 2f 20 63 61 75 73 65 73 | 20 74 68 65 20 46 69 6e |/ causes| the Fin|
|000014a0| 64 65 72 20 74 6f 20 72 | 65 70 6f 73 69 74 69 6f |der to r|epositio|
|000014b0| 6e 20 74 68 65 20 69 74 | 65 6d 20 69 6e 20 69 74 |n the it|em in it|
|000014c0| 73 20 77 69 6e 64 6f 77 | 29 13 69 66 20 66 2e 64 |s window|).if f.d|
|000014d0| 69 72 65 63 74 6f 72 79 | 20 74 68 65 6e 14 78 20 |irectory| then.x |
|000014e0| 3d 20 66 2e 47 65 74 46 | 6f 6c 64 65 72 46 6c 61 |= f.GetF|olderFla|
|000014f0| 67 73 8f 01 78 20 3d 20 | 53 65 74 42 69 74 28 78 |gs..x = |SetBit(x|
|00001500| 2c 20 38 2c 20 66 61 6c | 73 65 29 20 2f 2f 20 74 |, 8, fal|se) // t|
|00001510| 68 69 73 20 63 6c 65 61 | 72 73 20 62 69 74 20 38 |his clea|rs bit 8|
|00001520| 2c 20 77 68 69 63 68 20 | 69 73 20 74 68 65 20 22 |, which |is the "|
|00001530| 68 61 73 42 65 65 6e 49 | 6e 69 74 65 64 22 20 66 |hasBeenI|nited" f|
|00001540| 6c 61 67 19 65 72 72 20 | 3d 20 66 2e 53 65 74 46 |lag.err |= f.SetF|
|00001550| 6f 6c 64 65 72 46 6c 61 | 67 73 28 78 29 04 65 6c |olderFla|gs(x).el|
|00001560| 73 65 12 78 20 3d 20 66 | 2e 47 65 74 46 69 6c 65 |se.x = f|.GetFile|
|00001570| 46 6c 61 67 73 8f 01 78 | 20 3d 20 53 65 74 42 69 |Flags..x| = SetBi|
|00001580| 74 28 78 2c 20 38 2c 20 | 66 61 6c 73 65 29 20 2f |t(x, 8, |false) /|
|00001590| 2f 20 74 68 69 73 20 63 | 6c 65 61 72 73 20 62 69 |/ this c|lears bi|
|000015a0| 74 20 38 2c 20 77 68 69 | 63 68 20 69 73 20 74 68 |t 8, whi|ch is th|
|000015b0| 65 20 22 68 61 73 42 65 | 65 6e 49 6e 69 74 65 64 |e "hasBe|enInited|
|000015c0| 22 20 66 6c 61 67 17 65 | 72 72 20 3d 20 66 2e 53 |" flag.e|rr = f.S|
|000015d0| 65 74 46 69 6c 65 46 6c | 61 67 73 28 78 29 03 65 |etFileFl|ags(x).e|
|000015e0| 6e 64 84 01 69 66 20 65 | 72 72 20 3c 3e 20 30 20 |nd..if e|rr <> 0 |
|000015f0| 61 6e 64 20 65 72 72 20 | 3c 3e 20 2d 34 34 20 74 |and err |<> -44 t|
|00001600| 68 65 6e 20 2f 2f 20 65 | 72 72 6f 72 20 2d 34 34 |hen // e|rror -44|
|00001610| 20 6d 65 61 6e 73 20 22 | 77 72 69 74 65 20 70 72 | means "|write pr|
|00001620| 6f 74 65 63 74 65 64 22 | 84 01 6d 73 67 42 6f 78 |otected"|..msgBox|
|00001630| 20 22 6f 6f 70 73 2c 20 | 53 65 74 2e 2e 2e 46 6c | "oops, |Set...Fl|
|00001640| 61 67 73 28 29 20 64 69 | 64 6e 27 74 20 77 6f 72 |ags() di|dn't wor|
|00001650| 6b 2c 20 65 72 72 6f 72 | 20 63 6f 64 65 20 69 73 |k, error| code is|
|00001660| 3a 20 22 20 2b 20 73 74 | 72 28 65 72 72 29 03 65 |: " + st|r(err).e|
|00001670| 6e 64 00 88 01 2f 2f 20 | 66 69 6e 61 6c 6c 79 2c |nd...// |finally,|
|00001680| 20 6c 65 74 27 73 20 73 | 65 65 20 69 66 20 77 65 | let's s|ee if we|
|00001690| 20 63 61 6e 20 69 64 65 | 6e 74 69 66 79 20 74 68 | can ide|ntify th|
|000016a0| 65 20 76 6f 6c 75 6d 65 | 20 77 69 74 68 6f 75 74 |e volume| without|
|000016b0| 20 74 68 65 20 76 52 65 | 66 4e 75 6d 3a 0d 66 6f | the vRe|fNum:.fo|
|000016c0| 75 6e 64 20 3d 20 66 61 | 6c 73 65 1a 66 6f 72 20 |und = fa|lse.for |
|000016d0| 69 20 3d 20 30 20 74 6f | 20 56 6f 6c 75 6d 65 43 |i = 0 to| VolumeC|
|000016e0| 6f 75 6e 74 2d 31 0f 76 | 32 20 3d 20 56 6f 6c 75 |ount-1.v|2 = Volu|
|000016f0| 6d 65 20 28 69 29 1a 69 | 66 20 76 32 2e 6e 61 6d |me (i).i|f v2.nam|
|00001700| 65 20 3d 20 76 6f 6c 2e | 6e 61 6d 65 20 74 68 65 |e = vol.|name the|
|00001710| 6e 36 2f 2f 20 6e 61 6d | 65 73 20 61 72 65 20 69 |n6// nam|es are i|
|00001720| 64 65 6e 74 69 63 61 6c | 2c 20 62 75 74 20 77 65 |dentical|, but we|
|00001730| 20 73 68 6f 75 6c 64 20 | 61 6c 73 6f 20 63 6f 6d | should |also com|
|00001740| 70 61 72 65 20 74 68 65 | 3b 2f 2f 20 76 6f 6c 75 |pare the|;// volu|
|00001750| 6d 65 20 69 6e 74 65 72 | 6e 61 6c 20 6e 75 6d 62 |me inter|nal numb|
|00001760| 65 72 20 69 6e 20 63 61 | 73 65 20 74 68 65 72 65 |er in ca|se there|
|00001770| 27 73 20 6d 6f 72 65 20 | 74 68 61 6e 20 6f 6e 65 |'s more |than one|
|00001780| 20 76 6f 6c 3b 2f 2f 20 | 77 69 74 68 20 74 68 65 | vol;// |with the|
|00001790| 20 73 61 6d 65 20 6e 61 | 6d 65 20 6d 6f 75 6e 74 | same na|me mount|
|000017a0| 65 64 20 28 77 68 69 63 | 68 20 69 73 20 70 6f 73 |ed (whic|h is pos|
|000017b0| 73 69 62 6c 65 20 6f 6e | 20 61 20 4d 61 63 21 29 |sible on| a Mac!)|
|000017c0| 00 26 69 66 20 76 32 2e | 4d 61 63 56 52 65 66 4e |.&if v2.|MacVRefN|
|000017d0| 75 6d 20 3d 20 76 6f 6c | 2e 4d 61 63 56 52 65 66 |um = vol|.MacVRef|
|000017e0| 4e 75 6d 20 74 68 65 6e | 26 2f 2f 20 79 65 73 2c |Num then|&// yes,|
|000017f0| 20 74 68 61 74 20 73 65 | 65 6d 73 20 74 6f 20 62 | that se|ems to b|
|00001800| 65 20 74 68 65 20 72 69 | 67 68 74 20 6f 6e 65 0c |e the ri|ght one.|
|00001810| 66 6f 75 6e 64 20 3d 20 | 74 72 75 65 03 65 6e 64 |found = |true.end|
|00001820| 03 65 6e 64 04 6e 65 78 | 74 11 69 66 20 6e 6f 74 |.end.nex|t.if not|
|00001830| 20 66 6f 75 6e 64 20 74 | 68 65 6e 28 6d 73 67 42 | found t|hen(msgB|
|00001840| 6f 78 20 22 4f 6f 70 73 | 20 2d 20 49 20 63 61 6e |ox "Oops| - I can|
|00001850| 27 74 20 66 69 6e 64 20 | 74 68 65 20 76 6f 6c 75 |'t find |the volu|
|00001860| 6d 65 21 22 03 65 6e 64 | 00 11 54 65 73 74 4e 65 |me!".end|..TestNe|
|00001870| 77 46 6f 6c 64 65 72 49 | 74 65 6d 00 07 45 6e 64 |wFolderI|tem..End|
|00001880| 20 53 75 62 11 54 65 73 | 74 4e 65 77 46 6f 6c 64 | Sub.Tes|tNewFold|
|00001890| 65 72 49 74 65 6d 00 00 | 00 06 1a 06 1a 08 17 53 |erItem..|.......S|
|000018a0| 75 62 20 54 65 73 74 4e | 65 77 46 6f 6c 64 65 72 |ub TestN|ewFolder|
|000018b0| 49 74 65 6d 28 29 13 44 | 69 6d 20 66 20 61 73 20 |Item().D|im f as |
|000018c0| 46 6f 6c 64 65 72 49 74 | 65 6d 2a 66 20 3d 20 4e |FolderIt|em*f = N|
|000018d0| 65 77 46 6f 6c 64 65 72 | 49 74 65 6d 28 2d 31 2c |ewFolder|Item(-1,|
|000018e0| 20 32 2c 20 22 44 65 73 | 6b 74 6f 70 20 46 6f 6c | 2, "Des|ktop Fol|
|000018f0| 64 65 72 22 29 14 69 66 | 20 6e 6f 74 20 66 2e 65 |der").if| not f.e|
|00001900| 78 69 73 74 73 20 74 68 | 65 6e 2b 6d 73 67 42 6f |xists th|en+msgBo|
|00001910| 78 20 22 4f 6f 70 73 20 | 2d 20 77 68 65 72 65 27 |x "Oops |- where'|
|00001920| 73 20 74 68 65 20 64 65 | 73 6b 74 6f 70 20 66 6f |s the de|sktop fo|
|00001930| 6c 64 65 72 3f 22 03 65 | 6e 64 1e 66 20 3d 20 56 |lder?".e|nd.f = V|
|00001940| 6f 6c 52 65 73 6f 6c 76 | 65 49 44 28 56 6f 6c 75 |olResolv|eID(Volu|
|00001950| 6d 65 28 30 29 2c 20 32 | 29 07 45 6e 64 20 53 75 |me(0), 2|).End Su|
|00001960| 62 00 06 0f 45 6e 61 62 | 6c 65 4d 65 6e 75 49 74 |b...Enab|leMenuIt|
|00001970| 65 6d 73 02 1f 02 1f 04 | 15 53 75 62 20 45 6e 61 |ems.....|.Sub Ena|
|00001980| 62 6c 65 4d 65 6e 75 49 | 74 65 6d 73 28 29 17 46 |bleMenuI|tems().F|
|00001990| 69 6c 65 4f 70 65 6e 2e | 65 6e 61 62 6c 65 64 20 |ileOpen.|enabled |
|000019a0| 3d 20 74 72 75 65 1f 46 | 69 6c 65 53 65 6c 65 63 |= true.F|ileSelec|
|000019b0| 74 46 6f 6c 64 65 72 2e | 65 6e 61 62 6c 65 64 20 |tFolder.|enabled |
|000019c0| 3d 20 74 72 75 65 07 45 | 6e 64 20 53 75 62 0a 44 |= true.E|nd Sub.D|
|000019d0| 72 6f 70 4f 62 6a 65 63 | 74 01 00 01 00 05 1f 53 |ropObjec|t......S|
|000019e0| 75 62 20 44 72 6f 70 4f | 62 6a 65 63 74 28 6f 62 |ub DropO|bject(ob|
|000019f0| 6a 20 41 73 20 44 72 61 | 67 49 74 65 6d 29 1f 69 |j As Dra|gItem).i|
|00001a00| 66 20 6f 62 6a 2e 46 6f | 6c 64 65 72 49 74 65 6d |f obj.Fo|lderItem|
|00001a10| 41 76 61 69 6c 61 62 6c | 65 20 74 68 65 6e 17 44 |Availabl|e then.D|
|00001a20| 65 6d 6f 49 74 20 28 6f | 62 6a 2e 46 6f 6c 64 65 |emoIt (o|bj.Folde|
|00001a30| 72 49 74 65 6d 29 03 65 | 6e 64 07 45 6e 64 20 53 |rItem).e|nd.End S|
|00001a40| 75 62 07 4d 6f 75 73 65 | 55 70 03 10 03 10 06 27 |ub.Mouse|Up.....'|
|00001a50| 53 75 62 20 4d 6f 75 73 | 65 55 70 28 58 20 41 73 |Sub Mous|eUp(X As|
|00001a60| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|00001a70| 6e 74 65 67 65 72 29 1c | 75 72 6c 2e 74 65 78 74 |nteger).|url.text|
|00001a80| 63 6f 6c 6f 72 20 3d 20 | 52 47 42 28 30 2c 30 2c |color = |RGB(0,0,|
|00001a90| 32 35 35 29 92 01 69 66 | 20 78 3e 75 72 6c 2e 6c |255)..if| x>url.l|
|00001aa0| 65 66 74 20 61 6e 64 20 | 78 3c 75 72 6c 2e 6c 65 |eft and |x<url.le|
|00001ab0| 66 74 2b 75 72 6c 2e 77 | 69 64 74 68 20 61 6e 64 |ft+url.w|idth and|
|00001ac0| 20 79 3e 75 72 6c 2e 74 | 6f 70 20 61 6e 64 20 79 | y>url.t|op and y|
|00001ad0| 3c 75 72 6c 2e 74 6f 70 | 2b 75 72 6c 2e 68 65 69 |<url.top|+url.hei|
|00001ae0| 67 68 74 20 74 68 65 6e | 10 53 68 6f 77 55 52 4c |ght then|.ShowURL|
|00001af0| 20 75 72 6c 2e 74 65 78 | 74 06 65 6e 64 20 69 66 | url.tex|t.end if|
|00001b00| 07 45 6e 64 20 53 75 62 | 09 4d 6f 75 73 65 44 72 |.End Sub|.MouseDr|
|00001b10| 61 67 01 00 05 06 07 29 | 53 75 62 20 4d 6f 75 73 |ag.....)|Sub Mous|
|00001b20| 65 44 72 61 67 28 58 20 | 41 73 20 49 6e 74 65 67 |eDrag(X |As Integ|
|00001b30| 65 72 2c 20 59 20 41 73 | 20 49 6e 74 65 67 65 72 |er, Y As| Integer|
|00001b40| 29 92 01 69 66 20 78 3e | 75 72 6c 2e 6c 65 66 74 |)..if x>|url.left|
|00001b50| 20 61 6e 64 20 78 3c 75 | 72 6c 2e 6c 65 66 74 2b | and x<u|rl.left+|
|00001b60| 75 72 6c 2e 77 69 64 74 | 68 20 61 6e 64 20 79 3e |url.widt|h and y>|
|00001b70| 75 72 6c 2e 74 6f 70 20 | 61 6e 64 20 79 3c 75 72 |url.top |and y<ur|
|00001b80| 6c 2e 74 6f 70 2b 75 72 | 6c 2e 68 65 69 67 68 74 |l.top+ur|l.height|
|00001b90| 20 74 68 65 6e 1c 75 72 | 6c 2e 74 65 78 74 63 6f | then.ur|l.textco|
|00001ba0| 6c 6f 72 20 3d 20 52 47 | 42 28 32 35 35 2c 30 2c |lor = RG|B(255,0,|
|00001bb0| 30 29 04 65 6c 73 65 1c | 75 72 6c 2e 74 65 78 74 |0).else.|url.text|
|00001bc0| 63 6f 6c 6f 72 20 3d 20 | 52 47 42 28 30 2c 30 2c |color = |RGB(0,0,|
|00001bd0| 32 35 35 29 06 65 6e 64 | 20 69 66 07 45 6e 64 20 |255).end| if.End |
|00001be0| 53 75 62 09 4d 6f 75 73 | 65 44 6f 77 6e 01 00 04 |Sub.Mous|eDown...|
|00001bf0| 06 06 39 46 75 6e 63 74 | 69 6f 6e 20 4d 6f 75 73 |..9Funct|ion Mous|
|00001c00| 65 44 6f 77 6e 28 58 20 | 41 73 20 49 6e 74 65 67 |eDown(X |As Integ|
|00001c10| 65 72 2c 20 59 20 41 73 | 20 49 6e 74 65 67 65 72 |er, Y As| Integer|
|00001c20| 29 20 41 73 20 42 6f 6f | 6c 65 61 6e 92 01 69 66 |) As Boo|lean..if|
|00001c30| 20 78 3e 75 72 6c 2e 6c | 65 66 74 20 61 6e 64 20 | x>url.l|eft and |
|00001c40| 78 3c 75 72 6c 2e 6c 65 | 66 74 2b 75 72 6c 2e 77 |x<url.le|ft+url.w|
|00001c50| 69 64 74 68 20 61 6e 64 | 20 79 3e 75 72 6c 2e 74 |idth and| y>url.t|
|00001c60| 6f 70 20 61 6e 64 20 79 | 3c 75 72 6c 2e 74 6f 70 |op and y|<url.top|
|00001c70| 2b 75 72 6c 2e 68 65 69 | 67 68 74 20 74 68 65 6e |+url.hei|ght then|
|00001c80| 1c 75 72 6c 2e 74 65 78 | 74 63 6f 6c 6f 72 20 3d |.url.tex|tcolor =|
|00001c90| 20 52 47 42 28 32 35 35 | 2c 30 2c 30 29 0b 72 65 | RGB(255|,0,0).re|
|00001ca0| 74 75 72 6e 20 74 72 75 | 65 06 65 6e 64 20 69 66 |turn tru|e.end if|
|00001cb0| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 04 4f 70 |.End Fun|ction.Op|
|00001cc0| 65 6e 01 18 01 18 03 0a | 53 75 62 20 4f 70 65 6e |en......|Sub Open|
|00001cd0| 28 29 18 41 63 63 65 70 | 74 46 69 6c 65 44 72 6f |().Accep|tFileDro|
|00001ce0| 70 20 22 41 6e 79 46 69 | 6c 65 22 07 45 6e 64 20 |p "AnyFi|le".End |
|00001cf0| 53 75 62 02 08 46 69 6c | 65 4f 70 65 6e 02 16 02 |Sub..Fil|eOpen...|
|00001d00| 16 07 1a 46 75 6e 63 74 | 69 6f 6e 20 41 63 74 69 |...Funct|ion Acti|
|00001d10| 6f 6e 20 41 73 20 42 6f | 6f 6c 65 61 6e 13 44 69 |on As Bo|olean.Di|
|00001d20| 6d 20 66 20 41 73 20 46 | 6f 6c 64 65 72 49 74 65 |m f As F|olderIte|
|00001d30| 6d 1e 66 3d 47 65 74 4f | 70 65 6e 46 6f 6c 64 65 |m.f=GetO|penFolde|
|00001d40| 72 49 74 65 6d 28 22 41 | 6e 79 46 69 6c 65 22 29 |rItem("A|nyFile")|
|00001d50| 0e 69 66 20 66 3c 3e 6e | 69 6c 20 74 68 65 6e 0a |.if f<>n|il then.|
|00001d60| 44 65 6d 6f 49 74 20 28 | 66 29 06 65 6e 64 20 69 |DemoIt (|f).end i|
|00001d70| 66 0c 45 6e 64 20 46 75 | 6e 63 74 69 6f 6e 10 46 |f.End Fu|nction.F|
|00001d80| 69 6c 65 53 65 6c 65 63 | 74 46 6f 6c 64 65 72 04 |ileSelec|tFolder.|
|00001d90| 0a 04 00 07 1a 46 75 6e | 63 74 69 6f 6e 20 41 63 |.....Fun|ction Ac|
|00001da0| 74 69 6f 6e 20 41 73 20 | 42 6f 6f 6c 65 61 6e 13 |tion As |Boolean.|
|00001db0| 44 69 6d 20 66 20 61 73 | 20 46 6f 6c 64 65 72 69 |Dim f as| Folderi|
|00001dc0| 74 65 6d 0e 66 3d 53 65 | 6c 65 63 74 46 6f 6c 64 |tem.f=Se|lectFold|
|00001dd0| 65 72 0f 49 66 20 66 3c | 3e 20 4e 69 6c 20 54 68 |er.If f<|> Nil Th|
|00001de0| 65 6e 0a 44 65 6d 6f 49 | 74 20 28 66 29 06 45 6e |en.DemoI|t (f).En|
|00001df0| 64 20 49 66 0c 45 6e 64 | 20 46 75 6e 63 74 69 6f |d If.End| Functio|
|00001e00| 6e 00 05 07 00 00 80 02 | 0a 53 74 61 74 69 63 54 |n.......|.StaticT|
|00001e10| 65 78 74 00 00 00 00 01 | 09 4d 6f 75 73 65 4d 6f |ext.....|.MouseMo|
|00001e20| 76 65 01 00 01 00 03 29 | 53 75 62 20 4d 6f 75 73 |ve.....)|Sub Mous|
|00001e30| 65 4d 6f 76 65 28 58 20 | 41 73 20 49 6e 74 65 67 |eMove(X |As Integ|
|00001e40| 65 72 2c 20 59 20 41 73 | 20 49 6e 74 65 67 65 72 |er, Y As| Integer|
|00001e50| 29 00 07 45 6e 64 20 53 | 75 62 00 00 07 00 00 80 |)..End S|ub......|
|00001e60| 02 0a 53 74 61 74 69 63 | 54 65 78 74 00 00 00 00 |..Static|Text....|
|00001e70| 00 00 00 07 00 00 80 02 | 0a 53 74 61 74 69 63 54 |........|.StaticT|
|00001e80| 65 78 74 00 00 00 00 00 | 00 00 07 00 00 80 02 0a |ext.....|........|
|00001e90| 53 74 61 74 69 63 54 65 | 78 74 00 00 00 00 00 00 |StaticTe|xt......|
|00001ea0| 00 07 00 00 80 02 0a 53 | 74 61 74 69 63 54 65 78 |.......S|taticTex|
|00001eb0| 74 00 00 00 00 01 09 4d | 6f 75 73 65 4d 6f 76 65 |t......M|ouseMove|
|00001ec0| 01 00 01 00 03 29 53 75 | 62 20 4d 6f 75 73 65 4d |.....)Su|b MouseM|
|00001ed0| 6f 76 65 28 58 20 41 73 | 20 49 6e 74 65 67 65 72 |ove(X As| Integer|
|00001ee0| 2c 20 59 20 41 73 20 49 | 6e 74 65 67 65 72 29 00 |, Y As I|nteger).|
|00001ef0| 07 45 6e 64 20 53 75 62 | 00 00 05 0a 53 74 61 74 |.End Sub|....Stat|
|00001f00| 69 63 54 65 78 74 1b 04 | 4e 61 6d 65 07 54 65 78 |icText..|Name.Tex|
|00001f10| 74 42 6f 78 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |tBox.Ind|ex.-2147|
|00001f20| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|00001f30| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|00001f40| 72 75 65 04 4c 65 66 74 | 02 31 33 03 54 6f 70 01 |rue.Left|.13.Top.|
|00001f50| 39 05 57 69 64 74 68 03 | 32 33 33 06 48 65 69 67 |9.Width.|233.Heig|
|00001f60| 68 74 02 31 36 07 48 65 | 6c 70 54 61 67 00 0b 42 |ht.16.He|lpTag..B|
|00001f70| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 13 44 69 73 61 |alloonHe|lp..Disa|
|00001f80| 62 6c 65 64 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |bledBall|oonHelp.|
|00001f90| 0e 41 75 74 6f 44 65 61 | 63 74 69 76 61 74 65 04 |.AutoDea|ctivate.|
|00001fa0| 54 72 75 65 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |True.Loc|kLeft.Fa|
|00001fb0| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00001fc0| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00001fd0| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00001fe0| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|00001ff0| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|00002000| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|00002010| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|00002020| 46 61 6c 73 65 04 54 65 | 78 74 2d 44 65 6d 6f 20 |False.Te|xt-Demo |
|00002030| 66 6f 72 20 46 69 6c 65 | 4d 67 72 2d 50 6c 75 67 |for File|Mgr-Plug|
|00002040| 69 6e 2e 20 42 79 20 54 | 68 6f 6d 61 73 20 54 65 |in. By T|homas Te|
|00002050| 6d 70 65 6c 6d 61 6e 6e | 09 54 65 78 74 41 6c 69 |mpelmann|.TextAli|
|00002060| 67 6e 01 30 09 54 65 78 | 74 43 6f 6c 6f 72 01 30 |gn.0.Tex|tColor.0|
|00002070| 09 4d 75 6c 74 69 4c 69 | 6e 65 04 54 72 75 65 0a |.MultiLi|ne.True.|
|00002080| 44 61 74 61 53 6f 75 72 | 63 65 00 09 44 61 74 61 |DataSour|ce..Data|
|00002090| 46 69 65 6c 64 00 00 0a | 53 74 61 74 69 63 54 65 |Field...|StaticTe|
|000020a0| 78 74 1b 04 4e 61 6d 65 | 0b 53 74 61 74 69 63 54 |xt..Name|.StaticT|
|000020b0| 65 78 74 32 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |ext2.Ind|ex.-2147|
|000020c0| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|000020d0| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|000020e0| 72 75 65 04 4c 65 66 74 | 02 31 33 03 54 6f 70 03 |rue.Left|.13.Top.|
|000020f0| 31 37 38 05 57 69 64 74 | 68 03 31 37 30 06 48 65 |178.Widt|h.170.He|
|00002100| 69 67 68 74 02 31 36 07 | 48 65 6c 70 54 61 67 00 |ight.16.|HelpTag.|
|00002110| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|00002120| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|00002130| 70 00 0e 41 75 74 6f 44 | 65 61 63 74 69 76 61 74 |p..AutoD|eactivat|
|00002140| 65 04 54 72 75 65 08 4c | 6f 63 6b 4c 65 66 74 05 |e.True.L|ockLeft.|
|00002150| 46 61 6c 73 65 07 4c 6f | 63 6b 54 6f 70 05 46 61 |False.Lo|ckTop.Fa|
|00002160| 6c 73 65 09 4c 6f 63 6b | 52 69 67 68 74 05 46 61 |lse.Lock|Right.Fa|
|00002170| 6c 73 65 0a 4c 6f 63 6b | 42 6f 74 74 6f 6d 04 54 |lse.Lock|Bottom.T|
|00002180| 72 75 65 08 54 65 78 74 | 46 6f 6e 74 06 47 65 6e |rue.Text|Font.Gen|
|00002190| 65 76 61 08 54 65 78 74 | 53 69 7a 65 01 39 04 42 |eva.Text|Size.9.B|
|000021a0| 6f 6c 64 05 46 61 6c 73 | 65 06 49 74 61 6c 69 63 |old.Fals|e.Italic|
|000021b0| 05 46 61 6c 73 65 09 55 | 6e 64 65 72 6c 69 6e 65 |.False.U|nderline|
|000021c0| 05 46 61 6c 73 65 04 54 | 65 78 74 24 56 69 73 69 |.False.T|ext$Visi|
|000021d0| 74 20 6d 79 20 52 45 41 | 4c 62 61 73 69 63 20 72 |t my REA|Lbasic r|
|000021e0| 65 6c 61 74 65 64 20 57 | 65 62 20 53 69 74 65 3a |elated W|eb Site:|
|000021f0| 09 54 65 78 74 41 6c 69 | 67 6e 01 30 09 54 65 78 |.TextAli|gn.0.Tex|
|00002200| 74 43 6f 6c 6f 72 01 30 | 09 4d 75 6c 74 69 4c 69 |tColor.0|.MultiLi|
|00002210| 6e 65 05 46 61 6c 73 65 | 0a 44 61 74 61 53 6f 75 |ne.False|.DataSou|
|00002220| 72 63 65 00 09 44 61 74 | 61 46 69 65 6c 64 00 01 |rce..Dat|aField..|
|00002230| 0a 53 74 61 74 69 63 54 | 65 78 74 1b 04 4e 61 6d |.StaticT|ext..Nam|
|00002240| 65 03 75 72 6c 05 49 6e | 64 65 78 0b 2d 32 31 34 |e.url.In|dex.-214|
|00002250| 37 34 38 33 36 34 38 0d | 54 61 62 50 61 6e 65 6c |7483648.|TabPanel|
|00002260| 49 6e 64 65 78 01 30 07 | 56 69 73 69 62 6c 65 04 |Index.0.|Visible.|
|00002270| 54 72 75 65 04 4c 65 66 | 74 03 31 38 36 03 54 6f |True.Lef|t.186.To|
|00002280| 70 03 31 37 38 05 57 69 | 64 74 68 03 31 32 38 06 |p.178.Wi|dth.128.|
|00002290| 48 65 69 67 68 74 02 31 | 36 07 48 65 6c 70 54 61 |Height.1|6.HelpTa|
|000022a0| 67 00 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |g..Ballo|onHelp..|
|000022b0| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|000022c0| 65 6c 70 00 0e 41 75 74 | 6f 44 65 61 63 74 69 76 |elp..Aut|oDeactiv|
|000022d0| 61 74 65 04 54 72 75 65 | 08 4c 6f 63 6b 4c 65 66 |ate.True|.LockLef|
|000022e0| 74 05 46 61 6c 73 65 07 | 4c 6f 63 6b 54 6f 70 05 |t.False.|LockTop.|
|000022f0| 46 61 6c 73 65 09 4c 6f | 63 6b 52 69 67 68 74 05 |False.Lo|ckRight.|
|00002300| 46 61 6c 73 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |False.Lo|ckBottom|
|00002310| 04 54 72 75 65 08 54 65 | 78 74 46 6f 6e 74 06 47 |.True.Te|xtFont.G|
|00002320| 65 6e 65 76 61 08 54 65 | 78 74 53 69 7a 65 01 39 |eneva.Te|xtSize.9|
|00002330| 04 42 6f 6c 64 05 46 61 | 6c 73 65 06 49 74 61 6c |.Bold.Fa|lse.Ital|
|00002340| 69 63 05 46 61 6c 73 65 | 09 55 6e 64 65 72 6c 69 |ic.False|.Underli|
|00002350| 6e 65 04 54 72 75 65 04 | 54 65 78 74 18 68 74 74 |ne.True.|Text.htt|
|00002360| 70 3a 2f 2f 77 77 77 2e | 74 65 6d 70 65 6c 2e 6f |p://www.|tempel.o|
|00002370| 72 67 2f 72 62 09 54 65 | 78 74 41 6c 69 67 6e 01 |rg/rb.Te|xtAlign.|
|00002380| 30 09 54 65 78 74 43 6f | 6c 6f 72 07 31 35 38 31 |0.TextCo|lor.1581|
|00002390| 37 37 33 09 4d 75 6c 74 | 69 4c 69 6e 65 05 46 61 |773.Mult|iLine.Fa|
|000023a0| 6c 73 65 0a 44 61 74 61 | 53 6f 75 72 63 65 00 09 |lse.Data|Source..|
|000023b0| 44 61 74 61 46 69 65 6c | 64 00 02 0a 53 74 61 74 |DataFiel|d...Stat|
|000023c0| 69 63 54 65 78 74 1b 04 | 4e 61 6d 65 0b 53 74 61 |icText..|Name.Sta|
|000023d0| 74 69 63 54 65 78 74 31 | 05 49 6e 64 65 78 0b 2d |ticText1|.Index.-|
|000023e0| 32 31 34 37 34 38 33 36 | 34 38 0d 54 61 62 50 61 |21474836|48.TabPa|
|000023f0| 6e 65 6c 49 6e 64 65 78 | 01 30 07 56 69 73 69 62 |nelIndex|.0.Visib|
|00002400| 6c 65 04 54 72 75 65 04 | 4c 65 66 74 02 31 33 03 |le.True.|Left.13.|
|00002410| 54 6f 70 02 33 38 05 57 | 69 64 74 68 03 33 30 31 |Top.38.W|idth.301|
|00002420| 06 48 65 69 67 68 74 02 | 31 36 07 48 65 6c 70 54 |.Height.|16.HelpT|
|00002430| 61 67 00 0b 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |ag..Ball|oonHelp.|
|00002440| 13 44 69 73 61 62 6c 65 | 64 42 61 6c 6c 6f 6f 6e |.Disable|dBalloon|
|00002450| 48 65 6c 70 00 0e 41 75 | 74 6f 44 65 61 63 74 69 |Help..Au|toDeacti|
|00002460| 76 61 74 65 04 54 72 75 | 65 08 4c 6f 63 6b 4c 65 |vate.Tru|e.LockLe|
|00002470| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00002480| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00002490| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|000024a0| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|000024b0| 06 53 79 73 74 65 6d 08 | 54 65 78 74 53 69 7a 65 |.System.|TextSize|
|000024c0| 02 31 32 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.12.Bold|.False.I|
|000024d0| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|000024e0| 72 6c 69 6e 65 05 46 61 | 6c 73 65 04 54 65 78 74 |rline.Fa|lse.Text|
|000024f0| 2e 44 72 61 67 20 61 20 | 66 69 6c 65 2c 20 66 6f |.Drag a |file, fo|
|00002500| 6c 64 65 72 20 6f 72 20 | 76 6f 6c 75 6d 65 20 69 |lder or |volume i|
|00002510| 6e 74 6f 20 74 68 69 73 | 20 77 69 6e 64 6f 77 09 |nto this| window.|
|00002520| 54 65 78 74 41 6c 69 67 | 6e 01 30 09 54 65 78 74 |TextAlig|n.0.Text|
|00002530| 43 6f 6c 6f 72 01 30 09 | 4d 75 6c 74 69 4c 69 6e |Color.0.|MultiLin|
|00002540| 65 05 46 61 6c 73 65 0a | 44 61 74 61 53 6f 75 72 |e.False.|DataSour|
|00002550| 63 65 00 09 44 61 74 61 | 46 69 65 6c 64 00 03 0a |ce..Data|Field...|
|00002560| 53 74 61 74 69 63 54 65 | 78 74 1b 04 4e 61 6d 65 |StaticTe|xt..Name|
|00002570| 08 49 6e 66 6f 74 65 78 | 74 05 49 6e 64 65 78 0b |.Infotex|t.Index.|
|00002580| 2d 32 31 34 37 34 38 33 | 36 34 38 0d 54 61 62 50 |-2147483|648.TabP|
|00002590| 61 6e 65 6c 49 6e 64 65 | 78 01 30 07 56 69 73 69 |anelInde|x.0.Visi|
|000025a0| 62 6c 65 04 54 72 75 65 | 04 4c 65 66 74 02 33 30 |ble.True|.Left.30|
|000025b0| 03 54 6f 70 02 36 36 05 | 57 69 64 74 68 03 32 36 |.Top.66.|Width.26|
|000025c0| 35 06 48 65 69 67 68 74 | 03 31 30 39 07 48 65 6c |5.Height|.109.Hel|
|000025d0| 70 54 61 67 00 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |pTag..Ba|lloonHel|
|000025e0| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|000025f0| 6f 6e 48 65 6c 70 00 0e | 41 75 74 6f 44 65 61 63 |onHelp..|AutoDeac|
|00002600| 74 69 76 61 74 65 04 54 | 72 75 65 08 4c 6f 63 6b |tivate.T|rue.Lock|
|00002610| 4c 65 66 74 04 54 72 75 | 65 07 4c 6f 63 6b 54 6f |Left.Tru|e.LockTo|
|00002620| 70 04 54 72 75 65 09 4c | 6f 63 6b 52 69 67 68 74 |p.True.L|ockRight|
|00002630| 04 54 72 75 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |.True.Lo|ckBottom|
|00002640| 04 54 72 75 65 08 54 65 | 78 74 46 6f 6e 74 06 47 |.True.Te|xtFont.G|
|00002650| 65 6e 65 76 61 08 54 65 | 78 74 53 69 7a 65 01 39 |eneva.Te|xtSize.9|
|00002660| 04 42 6f 6c 64 05 46 61 | 6c 73 65 06 49 74 61 6c |.Bold.Fa|lse.Ital|
|00002670| 69 63 05 46 61 6c 73 65 | 09 55 6e 64 65 72 6c 69 |ic.False|.Underli|
|00002680| 6e 65 05 46 61 6c 73 65 | 04 54 65 78 74 00 09 54 |ne.False|.Text..T|
|00002690| 65 78 74 41 6c 69 67 6e | 01 30 09 54 65 78 74 43 |extAlign|.0.TextC|
|000026a0| 6f 6c 6f 72 01 30 09 4d | 75 6c 74 69 4c 69 6e 65 |olor.0.M|ultiLine|
|000026b0| 04 54 72 75 65 0a 44 61 | 74 61 53 6f 75 72 63 65 |.True.Da|taSource|
|000026c0| 00 09 44 61 74 61 46 69 | 65 6c 64 00 04 00 02 41 |..DataFi|eld....A|
|000026d0| 04 4d 65 6e 75 04 4d 65 | 6e 75 05 a4 01 a4 01 90 |.Menu.Me|nu......|
|000026e0| 06 ac 04 04 01 00 00 80 | 80 80 80 10 00 00 00 00 |........|........|
|000026f0| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|00002700| 00 00 00 00 00 00 01 02 | 00 00 80 80 80 80 10 00 |........|........|
|00002710| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00002720| 65 6d 00 00 00 00 00 00 | 00 00 00 04 46 69 6c 65 |em......|....File|
|00002730| 00 80 80 80 80 10 00 00 | 00 00 00 07 00 00 88 01 |........|........|
|00002740| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00002750| 05 00 0e 53 65 6c 65 63 | 74 20 46 69 6c 65 2e 2e |...Selec|t File..|
|00002760| 2e 08 46 69 6c 65 4f 70 | 65 6e 80 80 80 80 10 01 |..FileOp|en......|
|00002770| 4f 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |O.......|...MenuI|
|00002780| 74 65 6d 00 00 00 00 00 | 00 00 00 00 10 53 65 6c |tem.....|.....Sel|
|00002790| 65 63 74 20 46 6f 6c 64 | 65 72 2e 2e 2e 10 46 69 |ect Fold|er....Fi|
|000027a0| 6c 65 53 65 6c 65 63 74 | 46 6f 6c 64 65 72 80 80 |leSelect|Folder..|
|000027b0| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|000027c0| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 00 01 |nuItem..|........|
|000027d0| 2d 00 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |-.......|........|
|000027e0| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|000027f0| 00 00 00 04 51 75 69 74 | 08 46 69 6c 65 51 75 69 |....Quit|.FileQui|
|00002800| 74 80 80 80 80 10 01 51 | 00 00 00 00 07 00 00 88 |t......Q|........|
|00002810| 01 0c 51 75 69 74 4d 65 | 6e 75 49 74 65 6d 00 00 |..QuitMe|nuItem..|
|00002820| 00 00 00 00 00 00 02 00 | 00 80 80 80 80 10 00 00 |........|........|
|00002830| 00 00 00 07 00 00 88 01 | 08 4d 65 6e 75 49 74 65 |........|.MenuIte|
|00002840| 6d 00 00 00 00 00 00 00 | 00 00 04 45 64 69 74 00 |m.......|...Edit.|
|00002850| 80 80 80 80 10 00 00 00 | 00 00 07 00 00 88 01 08 |........|........|
|00002860| 4d 65 6e 75 49 74 65 6d | 00 00 00 00 00 00 00 07 |MenuItem|........|
|00002870| 00 04 55 6e 64 6f 08 45 | 64 69 74 55 6e 64 6f 80 |..Undo.E|ditUndo.|
|00002880| 80 80 80 10 01 5a 00 00 | 00 00 07 00 00 88 01 08 |.....Z..|........|
|00002890| 4d 65 6e 75 49 74 65 6d | 00 00 00 00 00 00 00 00 |MenuItem|........|
|000028a0| 00 01 2d 00 80 80 80 80 | 10 00 00 00 00 00 07 00 |..-.....|........|
|000028b0| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|000028c0| 00 00 00 00 00 03 43 75 | 74 07 45 64 69 74 43 75 |......Cu|t.EditCu|
|000028d0| 74 80 80 80 80 10 01 58 | 00 00 00 00 07 00 00 88 |t......X|........|
|000028e0| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|000028f0| 00 00 00 04 43 6f 70 79 | 08 45 64 69 74 43 6f 70 |....Copy|.EditCop|
|00002900| 79 80 80 80 80 10 01 43 | 00 00 00 00 07 00 00 88 |y......C|........|
|00002910| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00002920| 00 00 00 05 50 61 73 74 | 65 09 45 64 69 74 50 61 |....Past|e.EditPa|
|00002930| 73 74 65 80 80 80 80 10 | 01 56 00 00 00 00 07 00 |ste.....|.V......|
|00002940| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|00002950| 00 00 00 00 00 05 43 6c | 65 61 72 09 45 64 69 74 |......Cl|ear.Edit|
|00002960| 43 6c 65 61 72 80 80 80 | 80 10 00 00 00 00 00 07 |Clear...|........|
|00002970| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|00002980| 00 00 00 00 00 02 00 00 | 80 80 80 80 10 00 00 00 |........|........|
|00002990| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|000029a0| 00 00 00 00 00 00 00 00 | 02 00 00 80 80 80 80 10 |........|........|
|000029b0| 00 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |........|...MenuI|
|000029c0| 74 65 6d 00 00 00 00 00 | 00 00 00 03 41 06 4d 6f |tem.....|....A.Mo|
|000029d0| 64 75 6c 65 0c 42 69 74 | 77 69 73 65 54 6f 6f 6c |dule.Bit|wiseTool|
|000029e0| 73 8e 02 a0 04 97 0d a4 | 0a 07 00 0c 42 69 74 77 |s.......|....Bitw|
|000029f0| 69 73 65 54 6f 6f 6c 73 | 1d 00 00 02 15 70 77 72 |iseTools|.....pwr|
|00002a00| 4f 66 32 28 33 31 29 20 | 61 73 20 49 6e 74 65 67 |Of2(31) |as Integ|
|00002a10| 65 72 01 14 70 77 72 49 | 6e 69 74 65 64 20 61 73 |er..pwrI|nited as|
|00002a20| 20 42 6f 6f 6c 65 61 6e | 01 04 06 53 65 74 42 69 | Boolean|...SetBi|
|00002a30| 74 36 76 61 6c 75 65 20 | 61 73 20 49 6e 74 65 67 |t6value |as Integ|
|00002a40| 65 72 2c 20 62 69 74 4e | 75 6d 62 65 72 20 61 73 |er, bitN|umber as|
|00002a50| 20 49 6e 74 65 67 65 72 | 2c 20 74 6f 31 20 61 73 | Integer|, to1 as|
|00002a60| 20 42 6f 6f 6c 65 61 6e | 07 49 6e 74 65 67 65 72 | Boolean|.Integer|
|00002a70| 00 03 0e 03 0e 0c 92 01 | 46 75 6e 63 74 69 6f 6e |........|Function|
|00002a80| 20 53 65 74 42 69 74 28 | 76 61 6c 75 65 20 61 73 | SetBit(|value as|
|00002a90| 20 49 6e 74 65 67 65 72 | 2c 20 62 69 74 4e 75 6d | Integer|, bitNum|
|00002aa0| 62 65 72 20 61 73 20 49 | 6e 74 65 67 65 72 2c 20 |ber as I|nteger, |
|00002ab0| 74 6f 31 20 61 73 20 42 | 6f 6f 6c 65 61 6e 29 20 |to1 as B|oolean) |
|00002ac0| 41 73 20 49 6e 74 65 67 | 65 72 33 2f 2f 20 73 65 |As Integ|er3// se|
|00002ad0| 74 73 20 6f 72 20 63 6c | 65 61 72 73 20 61 20 62 |ts or cl|ears a b|
|00002ae0| 69 74 20 69 6e 20 74 68 | 65 20 33 32 20 42 69 74 |it in th|e 32 Bit|
|00002af0| 20 69 6e 74 65 67 65 72 | 20 76 61 6c 75 65 10 44 | integer| value.D|
|00002b00| 69 6d 20 78 20 61 73 20 | 49 6e 74 65 67 65 72 19 |im x as |Integer.|
|00002b10| 78 20 3d 20 56 61 6c 75 | 65 4f 66 42 69 74 28 62 |x = Valu|eOfBit(b|
|00002b20| 69 74 4e 75 6d 62 65 72 | 29 0b 69 66 20 74 6f 31 |itNumber|).if to1|
|00002b30| 20 74 68 65 6e 06 2f 2f | 20 73 65 74 1b 72 65 74 | then.//| set.ret|
|00002b40| 75 72 6e 20 42 69 74 77 | 69 73 65 4f 72 20 28 76 |urn Bitw|iseOr (v|
|00002b50| 61 6c 75 65 2c 20 78 29 | 04 65 6c 73 65 08 2f 2f |alue, x)|.else.//|
|00002b60| 20 63 6c 65 61 72 29 72 | 65 74 75 72 6e 20 42 69 | clear)r|eturn Bi|
|00002b70| 74 77 69 73 65 41 6e 64 | 20 28 76 61 6c 75 65 2c |twiseAnd| (value,|
|00002b80| 20 42 69 74 77 69 73 65 | 4e 6f 74 20 28 78 29 29 | Bitwise|Not (x))|
|00002b90| 03 65 6e 64 0c 45 6e 64 | 20 46 75 6e 63 74 69 6f |.end.End| Functio|
|00002ba0| 6e 08 49 73 42 69 74 53 | 65 74 26 76 61 6c 75 65 |n.IsBitS|et&value|
|00002bb0| 20 61 73 20 49 6e 74 65 | 67 65 72 2c 20 62 69 74 | as Inte|ger, bit|
|00002bc0| 4e 75 6d 62 65 72 20 61 | 73 20 49 6e 74 65 67 65 |Number a|s Intege|
|00002bd0| 72 07 42 6f 6f 6c 65 61 | 6e 00 01 24 01 24 03 84 |r.Boolea|n..$.$..|
|00002be0| 01 46 75 6e 63 74 69 6f | 6e 20 49 73 42 69 74 53 |.Functio|n IsBitS|
|00002bf0| 65 74 28 76 61 6c 75 65 | 20 61 73 20 49 6e 74 65 |et(value| as Inte|
|00002c00| 67 65 72 2c 20 62 69 74 | 4e 75 6d 62 65 72 20 61 |ger, bit|Number a|
|00002c10| 73 20 49 6e 74 65 67 65 | 72 29 20 41 73 20 42 6f |s Intege|r) As Bo|
|00002c20| 6f 6c 65 61 6e 35 72 65 | 74 75 72 6e 20 42 69 74 |olean5re|turn Bit|
|00002c30| 77 69 73 65 41 6e 64 20 | 28 76 61 6c 75 65 2c 20 |wiseAnd |(value, |
|00002c40| 56 61 6c 75 65 4f 66 42 | 69 74 28 62 69 74 4e 75 |ValueOfB|it(bitNu|
|00002c50| 6d 62 65 72 29 29 20 3c | 3e 20 30 0c 45 6e 64 20 |mber)) <|> 0.End |
|00002c60| 46 75 6e 63 74 69 6f 6e | 0a 56 61 6c 75 65 4f 66 |Function|.ValueOf|
|00002c70| 42 69 74 10 62 69 74 4e | 6f 20 61 73 20 49 6e 74 |Bit.bitN|o as Int|
|00002c80| 65 67 65 72 07 49 6e 74 | 65 67 65 72 00 0f 13 0f |eger.Int|eger....|
|00002c90| 13 12 30 46 75 6e 63 74 | 69 6f 6e 20 56 61 6c 75 |..0Funct|ion Valu|
|00002ca0| 65 4f 66 42 69 74 28 62 | 69 74 4e 6f 20 61 73 20 |eOfBit(b|itNo as |
|00002cb0| 49 6e 74 65 67 65 72 29 | 20 41 73 20 49 6e 74 65 |Integer)| As Inte|
|00002cc0| 67 65 72 12 2f 2f 20 72 | 65 74 75 72 6e 73 20 32 |ger.// r|eturns 2|
|00002cd0| 5e 62 69 74 4e 6f 13 44 | 69 6d 20 69 2c 20 78 20 |^bitNo.D|im i, x |
|00002ce0| 61 73 20 49 6e 74 65 67 | 65 72 15 69 66 20 6e 6f |as Integ|er.if no|
|00002cf0| 74 20 70 77 72 49 6e 69 | 74 65 64 20 74 68 65 6e |t pwrIni|ted then|
|00002d00| 05 78 20 3d 20 31 0f 66 | 6f 72 20 69 20 3d 20 30 |.x = 1.f|or i = 0|
|00002d10| 20 74 6f 20 33 30 0d 70 | 77 72 4f 66 32 28 69 29 | to 30.p|wrOf2(i)|
|00002d20| 20 3d 20 78 09 78 20 3d | 20 32 20 2a 20 78 04 6e | = x.x =| 2 * x.n|
|00002d30| 65 78 74 17 70 77 72 4f | 66 32 28 33 31 29 20 3d |ext.pwrO|f2(31) =|
|00002d40| 20 26 48 38 30 30 30 30 | 30 30 30 10 70 77 72 49 | &H80000|000.pwrI|
|00002d50| 6e 69 74 65 64 20 3d 20 | 74 72 75 65 03 65 6e 64 |nited = |true.end|
|00002d60| 1f 69 66 20 62 69 74 4e | 6f 20 3c 20 30 20 6f 72 |.if bitN|o < 0 or|
|00002d70| 20 62 69 74 4e 6f 20 3e | 20 33 31 20 74 68 65 6e | bitNo >| 31 then|
|00002d80| 1e 52 61 69 73 65 20 6e | 65 77 20 4f 75 74 4f 66 |.Raise n|ew OutOf|
|00002d90| 42 6f 75 6e 64 73 45 78 | 63 65 70 74 69 6f 6e 04 |BoundsEx|ception.|
|00002da0| 65 6c 73 65 14 72 65 74 | 75 72 6e 20 70 77 72 4f |else.ret|urn pwrO|
|00002db0| 66 32 28 62 69 74 4e 6f | 29 03 65 6e 64 0c 45 6e |f2(bitNo|).end.En|
|00002dc0| 64 20 46 75 6e 63 74 69 | 6f 6e 0a 42 69 74 77 69 |d Functi|on.Bitwi|
|00002dd0| 73 65 4e 6f 74 0c 76 20 | 61 73 20 49 6e 74 65 67 |seNot.v |as Integ|
|00002de0| 65 72 07 49 6e 74 65 67 | 65 72 00 02 0d 02 0d 04 |er.Integ|er......|
|00002df0| 2c 46 75 6e 63 74 69 6f | 6e 20 42 69 74 77 69 73 |,Functio|n Bitwis|
|00002e00| 65 4e 6f 74 28 76 20 61 | 73 20 49 6e 74 65 67 65 |eNot(v a|s Intege|
|00002e10| 72 29 20 41 73 20 49 6e | 74 65 67 65 72 1c 2f 2f |r) As In|teger.//|
|00002e20| 20 72 65 74 75 72 6e 73 | 20 61 6c 6c 20 62 69 74 | returns| all bit|
|00002e30| 73 20 69 6e 76 65 72 74 | 65 64 0d 72 65 74 75 72 |s invert|ed.retur|
|00002e40| 6e 20 2d 31 20 2d 20 76 | 0c 45 6e 64 20 46 75 6e |n -1 - v|.End Fun|
|00002e50| 63 74 69 6f 6e 00 00 00 | 00 00 00 00 00 00 00 00 |ction...|........|
|00002e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e80| 00 00 01 00 00 00 01 00 | 00 00 00 00 00 00 00 1e |........|........|
|00002e90| 54 68 69 73 20 72 65 73 | 6f 75 72 63 65 20 66 6f |This res|ource fo|
|00002ea0| 72 6b 20 69 6e 74 65 6e | 74 69 6f 6e 61 6c 6c 79 |rk inten|tionally|
|00002eb0| 20 6c 65 66 74 20 62 6c | 61 6e 6b 20 20 20 00 00 | left bl|ank ..|
|00002ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f80| 00 00 01 00 00 00 01 00 | 00 00 00 00 00 00 00 1e |........|........|
|00002f90| 00 00 00 00 00 00 00 00 | 00 1c 00 1e ff ff 00 00 |........|........|
|00002fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+